home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 141
- Top = 186
- Width = 492
- Height = 365
- Caption = 'FreeView Graphics Viewer'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- Menu = MainMenu1
- ShowHint = True
- OnActivate = FormActivate
- OnCreate = FormCreate
- OnResize = FormResize
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 0
- Top = 48
- Width = 145
- Height = 271
- Align = alLeft
- TabOrder = 0
- object Label2: TLabel
- Left = 10
- Top = 159
- Width = 111
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Caption = 'Label2'
- end
- object SpeedButton3: TSpeedButton
- Left = 127
- Top = 155
- Width = 15
- Height = 20
- Hint = 'Resize file list box.'
- AllowAllUp = True
- Caption = '>'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = SpeedButton3Click
- end
- object ListBox1: TListBox
- Left = 8
- Top = 176
- Width = 129
- Height = 199
- Hint = 'Click to select.'
- IntegralHeight = True
- ItemHeight = 13
- MultiSelect = True
- TabOrder = 2
- OnClick = ListBox1Click
- end
- object DriveComboBox1: TDriveComboBox
- Left = 8
- Top = 8
- Width = 130
- Height = 21
- TabOrder = 0
- OnChange = DriveComboBox1Change
- end
- object DirectoryListBox1: TDirectoryListBox
- Left = 8
- Top = 32
- Width = 130
- Height = 121
- Hint = 'Double click to select.'
- ItemHeight = 16
- TabOrder = 1
- OnClick = DirectoryListBox1Click
- OnDblClick = DirectoryListBox1DblClick
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 28
- Width = 484
- Height = 20
- Align = alTop
- TabOrder = 1
- object Label1: TLabel
- Left = 8
- Top = 4
- Width = 3
- Height = 14
- Font.Color = clMaroon
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object ProgressBar1: TProgressBar
- Left = 410
- Top = 6
- Width = 40
- Height = 9
- Min = 0
- Max = 100
- TabOrder = 0
- Visible = False
- end
- end
- object Panel3: TPanel
- Left = 145
- Top = 48
- Width = 339
- Height = 271
- Align = alClient
- BevelOuter = bvLowered
- BevelWidth = 2
- TabOrder = 2
- object Label5: TLabel
- Left = 8
- Top = 8
- Width = 119
- Height = 16
- Caption = 'File Loading Error!'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Visible = False
- end
- object Image1: TImage
- Left = 2
- Top = 2
- Width = 335
- Height = 267
- Align = alClient
- Center = True
- Visible = False
- end
- object wiaTile1: TwiaTile
- Left = 2
- Top = 2
- Width = 335
- Height = 267
- TranColor = clBlack
- TileMode = tmNormal
- Visible = False
- end
- object GIFImage1: TGIFImage
- Left = 2
- Top = 2
- Width = 335
- Height = 267
- Align = alClient
- Animate = True
- AutoSize = False
- Center = True
- CurrentFrame = 0
- Loop = True
- Stretch = False
- Tile = False
- Visible = True
- OnChanging = GIFImage1Changing
- end
- end
- object Panel4: TPanel
- Left = 0
- Top = 0
- Width = 484
- Height = 28
- Align = alTop
- TabOrder = 3
- object ScanBtn: TSpeedButton
- Left = 3
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Scan directory'
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000028000000140000000100
- 0400000000009001000000000000000000001000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333333FFFFF
- FFF000003333333FFFFFFFF000003333333BFBFBFBF0FFF03333333999999BF0
- FFF03333333FFFFFFF000000333339999999999000003333333BFBFBF0FBFBFB
- 3339999BFBFBF9999BFB3333333F00000FF000003399933F00000FF990003333
- 333B0FFF0000FFF03399993B0FFF000099F03333333F00000FF000003399999F
- 00000FF099003333330BFBFBF0FBFBFB399399999BFBF0FBF99B33333010FFFF
- FF0000003993399999FFFF000990333330180BFBFBF0FFF039933019999BFBF0
- F9903333301180FFFFF00000399330119999FFF0099033330811190BFBFBFBFB
- 3993081119999BFBF99B333307719990FFFFFFFF339907719999999F99FF3330
- 77FF999903333333339977FF99999999993333077FFFF0003333333333099FFF
- F000399993333077FFF0033333333333307999F0033333999333077FFF033333
- 33333333077F999933339999933307FFF09333333333333307FFF09999999933
- 333330FF093333333333333330FF093399993333333333003333333333333333
- 33003333333333333333}
- NumGlyphs = 2
- OnClick = DirectoryListBox1DblClick
- end
- object SpeedButton2: TSpeedButton
- Left = 29
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Save File'
- Glyph.Data = {
- 5A010000424D5A01000000000000760000002800000012000000130000000100
- 040000000000E400000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 888888000000888888888888888888000000800000000000000888000000800B
- FBFBFBFBFB08880000008070BFBFBFBFBFB08800000080B0FBFBFBFBFBF08800
- 00008070BFBFBFBFBFB08800000080B77BFBFBFBFBFB78000000807B7FBFBFBF
- BFBF7800000080B777777777777778000000807B7B7EEEE77B78880000008000
- B7B0EEE77778880000008888000EEEE7888888000000888880EEE0E788888800
- 000088880EEE08778888880000008880EEE0888788888800000088880E088888
- 888888000000888880888888888888000000888888888888888888000000}
- OnClick = SaveAs1Click
- end
- object ZoomBtn: TSpeedButton
- Left = 80
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Zoom to fill'
- AllowAllUp = True
- GroupIndex = 13
- Glyph.Data = {
- 7E010000424D7E01000000000000760000002800000016000000160000000100
- 0400000000000801000000000000000000000000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA
- AAAAAAAAAA00A00007777777777770000A00A00777777777777777700A00A070
- 77777777777777070A00A07707777777777770770A00A7777077777777770777
- 7A00A77777B30B0B303B77777A00A777770B33B303B077777A00A77777E0B0B0
- 3B0E77777A00A77777EE030E00EE77777A00A77777EEE0EEEEEE77777A00A777
- 77EEEEEEEEEE77777A00A77777EEEEEEE00E77777A00A77777EEEEEE0BB07777
- 7A00A77777EEEEEE0BB077777A00A77777EEEEEEE00E77777A00A77770777777
- 777707777A00A07707777777777770770A00A07077777777777777070A00A007
- 77777777777777700A00A00007777777777770000A00AAAAAAAAAAAAAAAAAAAA
- AA00}
- OnClick = ZoomBtnClick
- end
- object SlideShowBtn: TSpeedButton
- Left = 157
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Slides Show'
- AllowAllUp = True
- GroupIndex = 6
- Glyph.Data = {
- 80010000424D8001000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000000000000000000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777700007FFFFFFFFFFFFFFFFFF700008777777777777777777F00008777
- 777777777777777F00008777777077777777777F00008777777007777777777F
- 00008777777000777777777F00008777777000077777777F0000877777700000
- 7777777F00008777777000000777777F00008777777000007777777F00008777
- 777000077777777F00008777777000777777777F00008777777007777777777F
- 00008777777077777777777F00008777777777777777777F0000877777777777
- 7777777F00007888888888888888888700007777777777777777777700007777
- 7777777777777777000000000000000000000000000000000000000000000000
- 00000000}
- OnClick = SlideShowBtnClick
- end
- object HelpButton: TSpeedButton
- Left = 416
- Top = 2
- Width = 26
- Height = 25
- Hint = 'Help'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000010000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888800008888888888888888888800008888888887778888888800008888
- 8888600788888888000088888888E60788888888000088888888EE6888888888
- 000088888888877788888888000088888888600788888888000088888888E607
- 78888888000088888888E660778888880000888888888E660778888800008888
- 888878E660778888000088888880778E660788880000888888660778E6078888
- 0000888888E66077E608888800008888888E660066688888000088888888E666
- 6E8888880000888888888EEEE888888800008888888888888888888800008888
- 88888888888888880000}
- OnClick = HelpButtonClick
- end
- object StopBtn: TSpeedButton
- Left = 3
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Stop Scanning'
- Glyph.Data = {
- 80010000424D8001000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000000000000000000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777700007777711111111177777700007777199999999917777700007771
- 9999999999917777000077199999999999991777000071999999999999999177
- 000019999999999999999917000019FFF99F99FFF9F9991700001999F99F99F9
- F9F99917000019FFF99F99F9F9FFF917000019F9999F99F9F9F9F917000019FF
- F9FFF9FFF9FFF917000019999999999999999917000019999999999999999917
- 0000719999999999999991770000771999999999999917770000777199999999
- 9991777700007777199999999917777700007777711111111177777700007777
- 7777777777777777000000000000000000000000000000000000000000000000
- 00000000}
- Visible = False
- OnClick = StopBtnClick
- end
- object CopytoClipbrd: TSpeedButton
- Left = 54
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Copy to Clipboard'
- AllowAllUp = True
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
- FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
- 007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
- 7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
- 99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
- 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
- 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
- 93337FFFF7737777733300000033333333337777773333333333}
- NumGlyphs = 2
- OnClick = CopytoClipbrdClick
- end
- object TileBtn: TSpeedButton
- Left = 131
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Tile Image'
- AllowAllUp = True
- GroupIndex = 5
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000000000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000
- 00000000000004744499444999444490000004474FFFF99FFFF99FF000000444
- 74994444994444900000044474994444994444900000044447FFF99FFFF99FF0
- 000004444479444499444490000004444447444499444490000004444444799F
- FFF99FF000000444444447449944449000000444444FFF449944449000000444
- 4444FF7FFFF99FF0000004444F4F4F4799444490000004444FF4444479444490
- 000004444FFF444447F99FF00000044444444444447444900000044994444444
- 44744490000004499444444444479FF0000009FFFF9444444444749000000000
- 00000000000000000000}
- OnClick = TileBtnClick
- end
- object AnimationBtn: TSpeedButton
- Left = 228
- Top = 2
- Width = 25
- Height = 25
- Hint = 'GIF Animate On/Off'
- AllowAllUp = True
- GroupIndex = 7
- Down = True
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 77777777000077777777777777777777000077F6788686886868868700006637
- 37786866868668670000777F7FF786886868868700006637B778780086866867
- 00006637B7787800868668670000887F7FF98000686886870000668789987000
- 8686686700008868688700006868868700006686800078000686686700006686
- 800078000686686700008868000007FF0068868700006686866868FFF0066867
- 0000886868868688FF00068700006686866868668FF000670000668686686866
- 8FF000670000886868868688686FF00700006686866868668686680700008868
- 68868688686886870000}
- OnClick = AnimationBtnClick
- end
- object StepBtn: TSpeedButton
- Left = 253
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Ani-GIF Next Frame'
- AllowAllUp = True
- Enabled = False
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDDDD0000DD000000000000000DDD0000DD0F0DDDDD00000F0DDD0000DD00
- 0DDD807FEF00008D0000DD000DDD0EFEFE000F0D0000DD0F0D007FEFEF0F0E70
- 0000DD000000000000000FE00000DD000000000000000FE00000DD0F08007676
- 760F0EF00000DD000800676767000FE00000DD000000000000000EF00000DD0F
- 08006767670F0F700000DD000000000000000E0D0000DD00088808676700008D
- 0000DD0F08880867670F008D0000DD000000000000000DDD0000DD0008888888
- 88000DDD0000DD0F08888888880F0DDD0000DD000000000000000DDD0000DDDD
- DDDDDDDDDDDDDDDD0000}
- OnClick = StepBtnClick
- end
- object BkgClrBtn: TSpeedButton
- Left = 278
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Background Color'
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000028000000140000000100
- 0400000000009001000000000000000000000000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 7777777777777777777777777777700000000000000000077FFFFFFFFFFFFFFF
- FFF7700777777777777700077FFFFFFFFFFFFFFFFFF770075557AAA7DDD70007
- 7FFFFFFFFFFFFFFFFFF770075557AAA7DDD700077FFFFFFFFFFFFFFFFFF77007
- 5557AAA7DDD700077FFFFFFFFFFFFFFFFFF7700777777777777700077FFFFFFF
- FFFFFFFFFFF77007EEE71117CCC700077FFFFFFFFFFFFFFFFFF77007EEE71117
- CCC700077FFFFFFFFFFFFFFFFFF77007EEE71117CCC700077FFFFFFFFFFFFFFF
- FFF7700777777777777700077FFFFFFFFFFFFFFFFFF7700799973337BBB70007
- 7FFFFFFFFFFFFFFFFFF7700799973337BBB700077FFFFFFFFFFFFFFFFFF77007
- 99973337BBB700077FFFFFFFFFFFFFFFFFF7700777777777777700077FFFFFFF
- FFFFFFFFFFF7700000000000000000077FFFFFFFFFFFFFFFFFF7700000000000
- 000000077FFFFFFFFFFFFFFFFFF77CCCCCCCCCCCCCCCCCC77CCCCCCCCCCCCCCC
- CCC77CCCCCCCCCCCCCCCCCC77CCCCCCCCCCCCCCCCCC777777777777777777777
- 77777777777777777777}
- NumGlyphs = 2
- OnClick = BkgClrBtnClick
- end
- object SpeedButton1: TSpeedButton
- Left = 388
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Thumb nail view'
- AllowAllUp = True
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000000000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000
- 0000000000000FFFFFFFFFFFFFFFFFF000000F000F000F000F000FF000000F66
- 6F222F666F222FF000000F6B6F2B2F6B6F2B2FF000000F666F222F666F222FF0
- 00000FFFFFFFFFFFFFFFFFF000000F000F000F000F000FF000000F222F666F22
- 2F666FF000000F2B2F6B6F2B2F6B6FF000000F222F666F222F666FF000000FFF
- FFFFFFFFFFFFFFF000000F000F000F000F000FF000000F666F222F666F222FF0
- 00000F6B6F2B2F6B6F2B2FF000000F666F222F666F222FF000000FFFFFFFFFFF
- FFFFFFF000000CCCCCCCCCCCCCCCCCC000000CCCCCCCCCCCCCCCCCC000000000
- 00000000000000000000}
- OnClick = SpeedButton1Click
- end
- object Label3: TLabel
- Left = 310
- Top = 2
- Width = 36
- Height = 12
- Caption = 'Selected'
- Font.Color = clBlack
- Font.Height = -9
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object ReduceBtn: TSpeedButton
- Left = 106
- Top = 2
- Width = 25
- Height = 25
- Hint = 'Reduce to fit'
- AllowAllUp = True
- GroupIndex = 11
- Down = True
- Glyph.Data = {
- 7E010000424D7E01000000000000760000002800000016000000160000000100
- 0400000000000801000000000000000000000000000010000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA
- AAAAAAAAAA00A0EEEEEEEEEEEEEEEEEE0A00AE0EE0EEEEEEEEEE0EE0EA00AEE0
- 707777777777070EEA00AEE7007777777777007EEA00AE000077777777770000
- EA00AEE777B30B0B303B777EEA00AEE7770B33B303B0777EEA00AEE777E0B0B0
- 3B0E777EEA00AEE777EE030E00EE777EEA00AEE777EEE0EEEEEE777EEA00AEE7
- 77EEEEEEEEEE777EEA00AEE777EEEEEEE00E777EEA00AEE777EEEEEE0BB0777E
- EA00AEE777EEEEEE0BB0777EEA00AEE777EEEEEEE00E777EEA00AE0000777777
- 77770000EA00AEE7007777777777007EEA00AEE0707777777777070EEA00AE0E
- E0EEEEEEEEEE0EE0EA00A0EEEEEEEEEEEEEEEEEE0A00AAAAAAAAAAAAAAAAAAAA
- AA00}
- OnClick = ReduceBtnClick
- end
- object Label4: TLabel
- Left = 310
- Top = 13
- Width = 3
- Height = 13
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- end
- object SpinEdit1: TSpinEdit
- Left = 183
- Top = 4
- Width = 43
- Height = 22
- Hint = 'Slide delay'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxValue = 999
- MinValue = 1
- ParentFont = False
- TabOrder = 0
- Value = 4
- end
- end
- object TreeScanner1: TTreeScanner
- OnDirectoryFound = TreeScanner1DirectoryFound
- OnDirectoryDone = TreeScanner1DirectoryDone
- OnFileFound = TreeScanner1FileFound
- FileMask = '*.*'
- Left = 24
- Top = 280
- end
- object MainMenu1: TMainMenu
- Left = 64
- Top = 280
- object File1: TMenuItem
- Caption = '&File'
- ShortCut = 0
- object CopyToClipbrd1: TMenuItem
- Caption = '&Copy To Clipbrd'
- ShortCut = 16451
- OnClick = CopyToClipbrd1Click
- end
- object Delete1: TMenuItem
- Caption = '&Delete'
- ShortCut = 16452
- OnClick = Delete1Click
- end
- object Copy1: TMenuItem
- Caption = '&Multi Copy'
- ShortCut = 16461
- OnClick = Copy1Click
- end
- object SaveAs1: TMenuItem
- Caption = '&Save As...'
- ShortCut = 16467
- OnClick = SaveAs1Click
- end
- object ShowHints1: TMenuItem
- Caption = 'Show Hints'
- Checked = True
- ShortCut = 0
- OnClick = ShowHints1Click
- end
- object Untag1: TMenuItem
- Caption = '&Untag'
- ShortCut = 16469
- OnClick = Untag1Click
- end
- object Exit1: TMenuItem
- Caption = '&Quit'
- ShortCut = 16465
- OnClick = Exit1Click
- end
- end
- object Options1: TMenuItem
- Caption = '&Options'
- ShortCut = 0
- object ViewOptions1: TMenuItem
- Caption = '&View Options...'
- ShortCut = 0
- OnClick = ViewOptions1Click
- end
- object Wallpaper1: TMenuItem
- Caption = ' &Wallpaper'
- ShortCut = 0
- object Center1: TMenuItem
- Caption = 'Center'
- ShortCut = 0
- OnClick = Center1Click
- end
- object Stretchtofit1: TMenuItem
- Caption = 'Stretch to fit'
- ShortCut = 0
- OnClick = Stretchtofit1Click
- end
- object Tile1: TMenuItem
- Caption = 'Tile'
- ShortCut = 0
- OnClick = Tile1Click
- end
- end
- end
- object View1: TMenuItem
- Caption = '&View'
- ShortCut = 0
- object Zoom1: TMenuItem
- Caption = '&Zoom'
- ShortCut = 0
- OnClick = Zoom1Click
- end
- object Reduce1: TMenuItem
- Caption = '&Reduce'
- ShortCut = 0
- OnClick = Reduce1Click
- end
- object Tiled1: TMenuItem
- Caption = '&Tiled'
- ShortCut = 0
- OnClick = TileBtnClick
- end
- object SlideShow1: TMenuItem
- Caption = '&Slide Show'
- ShortCut = 0
- OnClick = SlideShow1Click
- end
- object Animategif1: TMenuItem
- Caption = '&Animate (gif)'
- ShortCut = 0
- OnClick = Animategif1Click
- end
- object Transparentgif1: TMenuItem
- Caption = '&Next Frame (gif)'
- ShortCut = 0
- OnClick = StepBtnClick
- end
- object BkgroundColor1: TMenuItem
- Caption = '&Bkground Color'
- ShortCut = 0
- OnClick = BkgClrBtnClick
- end
- object Thumbnails1: TMenuItem
- Caption = 'T&humbnails'
- ShortCut = 0
- OnClick = SpeedButton1Click
- end
- end
- object Help1: TMenuItem
- Caption = '&Help'
- ShortCut = 0
- OnClick = HelpButtonClick
- end
- object About1: TMenuItem
- Caption = '&About'
- ShortCut = 0
- OnClick = About1Click
- end
- end
- object SaveDialog1: TSaveDialog
- FileEditStyle = fsEdit
- Left = 104
- Top = 280
- end
- object Timer1: TTimer
- Enabled = False
- OnTimer = Timer1Timer
- Left = 64
- Top = 232
- end
- object ColorDialog1: TColorDialog
- Ctl3D = True
- Left = 24
- Top = 232
- end
- object CopyFile1: TCopyFile
- Progress = False
- ShowFileNames = False
- Movefile = False
- Left = 80
- Top = 152
- end
- end
-